﻿Namespace FL_8x0.FL_800.Model
    Public Class Message

        Private _type As String
        Public Property Type() As String
            Get
                Return _type
            End Get
            Set(ByVal value As String)
                _type = value
            End Set
        End Property

        Private _msg As Object
        Public Property Msg() As Object
            Get
                Return _msg
            End Get
            Set(ByVal value As Object)
                _msg = value
            End Set
        End Property


        Public Sub New(ByVal type As String, ByVal msg As Object)
            Me.Type = type
            Me.Msg = msg
        End Sub
    End Class
End Namespace